
 
 
 
 L o o p 
 
 S t o p 
 
 
 
 
 
 ' L a b e l   E v e n t S t o p 
 
 ' 	 B e e p 
 
 ' E n d 
 
 
 
 V a r i a b l e   S t r i n g   N e w T e x t 
 
 V a r i a b l e   S t r i n g   O l d T e x t 
 
 V a r i a b l e   N u m e r i c   F r e q u e n c y   =   4 4 0 
 
 V a r i a b l e   N u m e r i c   M i l l i s e c o n d s   =   5 0 
 
 L a b e l   L o o p 
 
 	 N e w T e x t   =   T r i m ( S l o t T e x t ( 1 ) ) 
 
 	 N e w T e x t   =   R e p l a c e ( N e w T e x t ,   "   . . . " ,   " " ) 
 
 	 ' N e w T e x t   =   " b e e p   8 0 0   5 0 0 " 
 
 	 I f   N e w T e x t   < >   O l d T e x t 
 
 	 	 O l d T e x t   =   N e w T e x t 
 
 	 	 s 1 0   =   G e t S e p a r a t e d S t r i n g ( N e w T e x t ,   0 ) 
 
 	 	 s 1 1   =   G e t S e p a r a t e d S t r i n g ( N e w T e x t ,   1 ) 
 
 	 	 S e l e c t   s 1 0 
 
 	 	 	 C a s e   " f r e q u e n c y " 
 
 	 	 	 	 F r e q u e n c y   =   s 1 1 
 
 	 	 	 C a s e   " m i l l i s e c o n d s " 
 
 	 	 	 	 M i l l i s e c o n d s   =   s 1 1 
 
 	 	 	 C a s e   " b e e p " 
 
 	 	 	 	 B e e p   F r e q u e n c y   M i l l i s e c o n d s 
 
 	 	 E n d S e l e c t 
 
 	 	 W a i t   S e c o n d s   0 . 1 
 
 	 E n d I f 
 
 G o t o   L o o p 
 
 
 
 
 
 ' W A T C H   v 1 
 
 ' E X E C   D e s t X   =   1 2 
 
 